home *** CD-ROM | disk | FTP | other *** search
/ Trading on the Edge / Trading On The Edge - CD-ROM Toolkit (Wayzata Technology)(2031)(1994).bin / pc / mac_file / vendor_d / neuralwa / nw2v50 / rcnstrct.igb < prev    next >
Text File  |  1993-08-23  |  1KB  |  59 lines
  1. inst4.1     !June, 1993
  2. !****************************************************************
  3. !*                                *
  4. !*    Reconstruction error for recirc networks        *
  5. !*                                *
  6. !****************************************************************
  7. !
  8.  
  9. @LLsl                !Load super-layer
  10. =n0    Lpes            !Number of layers
  11. =LayN    0                       !Input layer
  12.  
  13. ! Look for first layer that learns
  14.  
  15. :Recon1
  16. +LayN    1            !next layer
  17. ?LayN    n0
  18. >bgt    ReconEnd        !past output layer
  19. @LLly                !load the layer
  20. ?Llrn    0            !is this a preprocessing layer?
  21. >bne    Recon2            !we are past the preprocessing layers
  22. >br    Recon1            !next layer
  23.  
  24. :Recon2
  25. =n3    Lpes            !remember #PEs
  26. =NPEl    LayN            !set up as near (source) layer
  27.  
  28. ! Add probe
  29. =PNam    "Visible"        !probe name
  30. @PbAS                !Add Probe
  31. @PbDC                !Delete all components
  32. @PALy                !Add Near layer to probe
  33.  
  34. @ILdD                !load default instrument
  35. =ITit    "Recons. Error"        !Instrument title
  36. =IGTy    "Strip"            !Graph Type
  37. =IGVr    "Err"            !Variable
  38. =ITTy    "RMS"            !RMS Transformation Type
  39. =ITMd    3            !Probe Transformation
  40. =IEpc    1            !RMS over an epoch
  41. =Ihgt    50
  42. =Iwdt    200
  43. =Ivmn    0.0
  44. =Ivmx    0.5
  45. =Ignx    100            !100 graph points
  46. =Inpl    1            !1 plots
  47. =ILnA    1            !Active in Learn
  48. =IRcA    1            !Active in recall
  49. =ILDv    10            !Every 10 iterations
  50. =IPrb    "Visible"        !Point to probe
  51. =ICAc    0            !Convergence criterion inactive
  52. =ICTh    0.001            !Convergence Threshold
  53. !Let NeuralWorks figure out where to put instrument
  54. =x    0
  55. =y    0
  56. @IAdd                !Now create instrument
  57.  
  58. :ReconEnd
  59.